Ì 2
abs.version (main)
[mnemonic]
&DJC[djc]
Field Name Len Dat Typ J DPM Offset/Local/VAL
mnemonic 10 FREE L djc
active 1 YN L &DJC[djc]|0
dx.codeset 10 CHOICE L &DJC[djc]|2
last.update 10 FREE L &DJC[djc]UPD
last.version 10 FREE L VAL=IF{"CANADA"'=@.country -@ABS.VERSION.main[99999999
VAL=];-@ABS.VERSION.main["CMG 999999"]'<"CMG ";-@AB
VAL=S.VERSION.main[99999999];-@ABS.VERSION.main[""]}
last.version.dict 10 FREE L VAL=IF{"CANADA"'=@.country -@ABS.DIAG.main[99999999];-
VAL=@ABS.DIAG.main["CMG 999999"]'<"CMG ";-@ABS.DIAG
VAL=.main[99999999];-@ABS.DIAG.main[""]}
last.version.dict.cmg 10 FREE L VAL=IF{@ABS.DRG.cmg.indicator[IF{-@ABS.DIAG.main["CMG
VAL=999999"]'<"CMG ";-@ABS.DIAG.main[99999999];-@AB
VAL=S.DIAG.main[""]}^ABS.VERSION.mnemonic] ABS.VERSION
VAL=.mnemonic}^ABS.VERSION.mnemonic
last.version.dict.drg 10 FREE L VAL=IF{IF{-@ABS.DIAG.main[99999999];-@ABS.DIAG.main[""
VAL=]}^ABS.VERSION.mnemonic&'@ABS.DRG.cmg.indicator AB
VAL=S.VERSION.mnemonic}^ABS.VERSION.mnemonic
last.version.norm 10 FREE L VAL=@ABS.PARAM.norm.version[-@ABS.PARAM.normal.version
VAL=s[""]]
name 30 FREE L &DJC[djc]|1
proc.codeset 10 CHOICE L &DJC[djc]|3
version.canadian.dad 15 FREE L ABS.CAN.DAD.VER&DJC[djc]|4
version.cmg 10 FREE L
version.cmg.dict 10 FREE L
version.drg 10 FREE L
version.drg.dict 10 FREE L
version.norm 10 FREE L
|